home *** CD-ROM | disk | FTP | other *** search
/ Chip 2006 December / chip-cd_2006_12.zip / 12 / Hity z okladki / Kaspersky Internet Security 6.0 / kis6.0.0.303pl.msi / opera_banner_deny.vbs < prev    next >
Text File  |  2006-02-07  |  314b  |  13 lines
  1. DoCommand "banner_deny:" + WScript.Arguments(0)
  2.  
  3. Sub DoCommand(ByVal params)
  4.     On Error Resume Next
  5.     set AVPGui=CreateObject("AVPGUI.Controller")
  6.     if err<>0 then
  7.         MsgBox("AVPGUI.Controller is not enabled!"+ vbCrLf+"Please enable ActiveX before")
  8.     else
  9.         call AVPGui.DoCommand(params)
  10.     end if
  11. end sub 
  12.  
  13.